top_command (cmd_load currentFile [])
goal_command 0 cmd_refine "let module m = M (F A) in ?"
